library(sf)
library(dplyr)
library(ggplot2)
library(plotly)
library(terra)
library(raster)
library(leaflet)
library(DT)felinos <-
st_read(
"C:/Users/gf0604-1/mapas/felinos/felinos.csv",
options = c(
"X_POSSIBLE_NAMES=decimalLongitude",
#longitud decimal
"Y_POSSIBLE_NAMES=decimalLatitude" #latitud decimal
),
quiet = TRUE
)st_crs(felinos)<-4326